PsL Monthly 1993 December

home *** CD-ROM | disk | FTP | other *** search

/ PsL Monthly 1993 December / PSL Monthly Shareware CD-ROM (December 1993).iso / prgmming / dos / basic / fuelga.exe / TEST.BAS < prev

BAS VBDOS Pro 1.0 Source | 1993-01-06 | 2.0 KB

open in:

MacOS 8.1 |

Win98 |

DOS

view JSON data |

view as text

This file was processed as: BAS VBDOS Pro 1.0 Source (other/basVBDOSPro10Source).
This format is not currently supported by dexvert.

Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	GW-BASIC `(document/gwBasic)`	ext	Supported
`66%`	dexvert	GFA-BASIC Atari `(other/gfaBASICAtari)`	ext	Supported
`1%`	dexvert	BAS VBDOS Pro 1.0 Source `(other/basVBDOSPro10Source)`	magic	Unsupported
`1%`	dexvert	Memotech MTX BASIC source `(document/memotechMTXBASICSource)`	ext	Unsupported
`1%`	dexvert	VBDOS Form `(other/vbDOSForm)`	magic	Unsupported
`1%`	dexvert	Amiga BASIC Protected File `(other/amigaBASICProtectedFile)`	ext	Unsupported
`1%`	dexvert	Visual Basic Tokenized Source `(other/visualBasicTokenizedSource)`	ext	Unsupported
`1%`	dexvert	ZBASIC `(other/zbasic)`	ext	Unsupported
`100%`	file	Applesoft BASIC program data, first line number 1	default (weak)
`99%`	file	data	default
`73%`	TrID	BAS VBDOS Pro 1.0 Source	default
`26%`	TrID	VBDOS 1.0 Form	default

hex view

+--------+-------------------------+-------------------------+--------+--------+
|00000000| fc 08 01 00 0e 00 a8 01 | d2 01 09 00 01 02 03 04 |........|........|
|00000010| 06 05 08 0a 00 00 30 11 | ff ff 24 00 ff ff 11 01 |......0.|..$.....|
|00000020| 6d 00 00 00 cd 00 c5 00 | 56 00 00 00 00 00 00 00 |m.......|V.......|
|00000030| 74 00 88 00 66 00 a2 00 | a9 00 00 00 00 00 00 00 |t...f...|........|
|00000040| 00 00 00 00 00 00 00 00 | b0 00 00 00 9a 00 00 00 |........|........|
|00000050| 7f 00 8d 00 00 00 00 00 | 00 00 00 00 e6 00 00 00 |........|........|
|00000060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 11 01 00 00 00 00 | 00 0c 53 65 74 55 70 4d |........|..SetUpM|
|00000080| 6f 6e 69 74 6f 72 b5 00 | 00 03 52 6f 77 ba 00 00 |onitor..|..Row...|
|00000090| 03 43 6f 6c 00 00 00 07 | 4e 75 6d 4d 6f 6e 73 08 |.Col....|NumMons.|
|000000a0| 01 00 05 54 69 74 6c 65 | 00 00 00 01 69 00 00 00 |...Title|....i...|
|000000b0| 09 44 6f 4d 6f 6e 69 74 | 6f 72 00 00 00 04 4e 6f |.DoMonit|or....No|
|000000c0| 77 77 00 00 00 03 54 6f | 70 d6 00 00 03 4d 6f 6e |ww....To|p....Mon|
|000000d0| 00 01 00 01 74 00 00 00 | 01 6a f0 00 00 07 52 75 |....t...|.j....Ru|
|000000e0| 6e 6e 69 6e 67 00 00 00 | 04 54 52 55 45 00 00 00 |nning...|.TRUE...|
|000000f0| 05 46 41 4c 53 45 00 00 | 00 0c 43 61 6e 63 65 6c |.FALSE..|..Cancel|
|00000100| 42 75 74 74 6f 6e 00 00 | 08 06 53 43 52 45 45 4e |Button..|..SCREEN|
|00000110| 00 00 00 0c 43 6f 6e 74 | 72 6f 6c 70 61 6e 65 6c |....Cont|rolpanel|
|00000120| 00 00 00 04 6a 75 6e 6b | 00 00 00 05 43 6f 75 6e |....junk|....Coun|
|00000130| 74 c2 06 00 04 97 00 06 | 00 01 00 20 0d 4a 3d 00 |t.......|... .J=.|
|00000140| 04 97 00 35 00 01 00 20 | 54 65 73 74 20 50 72 6f |...5... |Test Pro|
|00000150| 67 72 61 6d 20 74 6f 20 | 64 65 6d 6f 6e 73 74 72 |gram to |demonstr|
|00000160| 61 74 65 20 46 75 65 6c | 20 47 61 75 67 65 73 0d |ate Fuel| Gauges.|
|00000170| 11 20 4a 61 6e 20 31 39 | 39 33 20 00 04 97 00 2f |. Jan 19|93 ..../|
|00000180| 00 01 00 20 4e 65 65 64 | 73 20 4d 6f 64 75 6c 65 |... Need|s Module|
|00000190| 73 20 3a 20 4d 4f 4e 49 | 54 4f 52 2e 42 41 53 20 |s : MONI|TOR.BAS |
|000001a0| 61 6e 64 20 4d 4f 4e 49 | 54 4f 52 46 2e 46 52 4d |and MONI|TORF.FRM|
|000001b0| 00 00 04 97 00 10 00 01 | 00 20 52 75 6e 73 20 69 |........|. Runs i|
|000001c0| 6e 20 56 42 44 4f 53 00 | 04 97 00 1d 00 01 00 20 |n VBDOS.|....... |
|000001d0| 57 72 69 74 74 65 6e 20 | 42 79 0d 04 20 3a 20 41 |Written |By.. : A|
|000001e0| 69 64 61 6e 20 43 6f 79 | 6e 65 53 00 04 97 00 27 |idan Coy|neS....'|
|000001f0| 00 01 00 0d 11 20 31 37 | 2c 20 50 65 72 63 79 20 |..... 17|, Percy |
|00000200| 4c 61 6e 65 2c 20 44 75 | 62 6c 69 6e 20 34 2c 20 |Lane, Du|blin 4, |
|00000210| 49 72 65 6c 61 6e 64 2e | 54 00 04 97 00 20 00 01 |Ireland.|T.... ..|
|00000220| 00 0d 11 20 43 6f 6d 70 | 75 73 65 72 76 65 20 49 |... Comp|userve I|
|00000230| 44 20 3a 20 31 30 30 30 | 31 34 2c 32 37 30 30 00 |D : 1000|14,2700.|
|00000240| 04 97 00 2c 00 01 00 0d | 11 20 49 6e 74 65 72 6e |...,....|. Intern|
|00000250| 65 74 0d 06 20 3a 20 31 | 30 30 30 31 34 2e 32 37 |et.. : 1|00014.27|
|00000260| 30 30 40 43 6f 6d 70 75 | 53 65 72 76 65 2e 43 6f |00@Compu|Serve.Co|
|00000270| 6d 00 04 97 00 06 00 01 | 00 20 0d 4a 3d 00 00 00 |m.......|. .J=...|
|00000280| 00 44 00 1e 00 8d 00 81 | 02 03 00 9a 00 00 02 01 |.D......|........|
|00000290| 00 00 00 a2 00 00 02 01 | 00 00 00 a9 00 00 02 01 |........|........|
|000002a0| 00 00 00 00 00 44 00 2e | 00 56 00 00 01 05 00 66 |.....D..|.V.....f|
|000002b0| 00 00 02 01 00 00 00 6d | 00 00 02 01 00 00 00 74 |.......m|.......t|
|000002c0| 00 00 02 01 00 00 00 7f | 00 00 06 07 00 00 00 d6 |........|........|
|000002d0| 00 00 02 01 00 00 00 00 | 00 00 00 23 00 64 01 0c |........|...#.d..|
|000002e0| 00 cd 00 06 00 0b 00 cd | 00 74 01 0c 00 c5 00 00 |........|.t......|
|000002f0| 00 00 00 64 15 0c 04 66 | 00 06 00 64 29 0c 04 6d |...d...f|...d)..m|
|00000300| 00 97 00 1e 00 2b 00 20 | 50 6f 73 69 74 69 6f 6e |.....+. |Position|
|00000310| 20 6f 66 20 66 75 65 6c | 20 67 61 75 67 65 20 66 | of fuel| gauge f|
|00000320| 6f 72 6d 00 00 18 00 64 | 0d 0e 1c 02 00 7f 00 1c |orm....d|........|
|00000330| 00 97 00 1b 00 2b 00 20 | 54 65 78 74 20 66 6f 72 |.....+. |Text for|
|00000340| 20 65 61 63 68 20 66 75 | 65 6c 20 67 61 75 67 65 | each fu|el gauge|
|00000350| 78 00 00 6d 01 16 00 53 | 69 6e 67 6c 65 20 46 75 |x..m...S|ingle Fu|
|00000360| 65 6c 20 47 61 75 67 65 | 20 44 65 6d 6f 64 01 0f |el Gauge| Demod..|
|00000370| 1c 01 00 7f 00 97 00 1b | 00 2b 00 20 54 65 78 74 |........|.+. Text|
|00000380| 24 28 30 29 20 69 73 20 | 66 6f 72 6d 20 63 61 70 |$(0) is |form cap|
|00000390| 74 69 6f 6e 2d 00 00 6d | 01 0d 00 46 75 65 6c 20 |tion-..m|...Fuel |
|000003a0| 47 61 75 67 65 20 23 31 | 22 64 05 0f 1c 01 00 7f |Gauge #1|"d......|
|000003b0| 00 00 00 6d 01 0d 00 46 | 75 65 6c 20 47 61 75 67 |...m...F|uel Gaug|
|000003c0| 65 20 23 32 22 64 09 0f | 1c 01 00 7f 00 00 00 6d |e #2"d..|.......m|
|000003d0| 01 0d 00 46 75 65 6c 20 | 47 61 75 67 65 20 23 33 |...Fuel |Gauge #3|
|000003e0| 22 64 0d 0f 1c 01 00 7f | 00 00 00 00 00 97 00 2e |"d......|........|
|000003f0| 00 00 00 2d 2d 53 69 6e | 67 6c 65 20 46 75 65 6c |...--Sin|gle Fuel|
|00000400| 20 47 61 75 67 65 20 57 | 69 74 68 20 4e 6f 20 43 | Gauge W|ith No C|
|00000410| 61 6e 63 65 6c 20 42 75 | 74 74 6f 6e 0d 23 2d 00 |ancel Bu|tton.#-.|
|00000420| 00 64 05 0c 04 74 00 97 | 00 11 00 2b 00 20 4f 6e |.d...t..|...+. On|
|00000430| 65 20 46 75 65 6c 20 47 | 61 75 67 65 74 00 00 0b |e Fuel G|auget...|
|00000440| 00 cd 00 0c 04 d6 00 97 | 00 13 00 2b 00 20 4e 6f |........|...+. No|
|00000450| 20 43 61 6e 63 65 6c 20 | 42 75 74 74 6f 6e 2d 00 | Cancel |Button-.|
|00000460| 00 0b 04 66 00 0b 04 6d | 00 0b 04 74 00 0e 1c 00 |...f...m|...t....|
|00000470| 00 7f 00 0b 04 d6 00 37 | 00 05 00 56 00 00 00 0b |.......7|...V....|
|00000480| 04 88 00 64 05 65 01 64 | 00 56 00 ff ff e6 03 00 |...d.e.d|.V......|
|00000490| 08 0b 04 88 00 65 01 64 | 00 64 05 0e 04 03 00 8d |.....e.d|.d......|
|000004a0| 00 0c 04 00 01 97 00 14 | 00 2b 00 20 55 70 64 61 |........|.+. Upda|
|000004b0| 74 65 20 46 75 65 6c 20 | 47 61 75 67 65 00 08 0b |te Fuel |Gauge...|
|000004c0| 0c 08 01 64 05 65 01 b8 | 0b 56 00 ff ff b4 03 06 |...d.e..|.V......|
|000004d0| 00 65 00 ff ff 03 00 97 | 00 22 00 2b 00 20 44 65 |.e......|.".+. De|
|000004e0| 6c 61 79 20 65 2e 67 2e | 20 77 68 69 6c 65 20 72 |lay e.g.| while r|
|000004f0| 65 61 64 69 6e 67 20 72 | 65 63 6f 72 64 00 00 65 |eading r|ecord..e|
|00000500| 00 ff ff 01 00 00 00 64 | 01 64 01 64 01 0e 1c 00 |.......d|.d.d....|
|00000510| 00 7f 00 64 01 37 00 05 | 00 56 00 97 00 0e 00 2b |...d.7..|.V.....+|
|00000520| 00 20 52 65 6d 6f 76 65 | 20 46 6f 72 6d 00 00 97 |. Remove| Form...|
|00000530| 00 05 00 00 00 0d 4c 2d | 00 00 00 00 00 6d 01 0b |......L-|.....m..|
|00000540| 00 50 72 65 73 73 20 41 | 20 4b 65 79 22 c8 01 c7 |.Press A| Key"...|
|00000550| 01 c5 01 00 00 00 00 97 | 00 2e 00 00 00 2d 2d 4d |........|.....--M|
|00000560| 75 6c 74 69 70 6c 65 20 | 46 75 65 6c 20 47 61 75 |ultiple |Fuel Gau|
|00000570| 67 65 73 20 57 69 74 68 | 20 43 61 6e 63 65 6c 20 |ges With| Cancel |
|00000580| 42 75 74 74 6f 6e 0d 23 | 2d 00 00 6d 01 28 00 4d |Button.#|-..m.(.M|
|00000590| 75 6c 74 69 20 46 75 65 | 6c 20 47 61 75 67 65 20 |ulti Fue|l Gauge |
|000005a0| 44 65 6d 6f 20 77 69 74 | 68 20 43 61 6e 63 65 6c |Demo wit|h Cancel|
|000005b0| 20 42 75 74 74 6f 6e 64 | 01 0f 1c 01 00 7f 00 97 | Buttond|........|
|000005c0| 00 12 00 38 00 43 68 61 | 6e 67 65 20 74 68 65 20 |...8.Cha|nge the |
|000005d0| 74 69 74 6c 65 00 00 64 | 0d 0c 04 74 00 97 00 1a |title..d|...t....|
|000005e0| 00 2b 00 20 33 20 46 75 | 65 6c 20 47 61 75 67 65 |.+. 3 Fu|el Gauge|
|000005f0| 73 20 74 68 69 73 20 74 | 69 6d 65 00 00 0b 04 66 |s this t|ime....f|
|00000600| 00 0b 04 6d 00 0b 04 74 | 00 0e 1c 00 00 7f 00 64 |...m...t|.......d|
|00000610| 05 37 00 05 00 56 00 97 | 00 0e 00 38 00 44 69 73 |.7...V..|...8.Dis|
|00000620| 70 6c 61 79 20 46 6f 72 | 6d 00 00 00 00 0b 00 c5 |play For|m.......|
|00000630| 00 0c 04 ba 00 00 00 0b | 04 88 00 64 05 65 01 64 |........|...d.e.d|
|00000640| 00 56 00 ff ff dc 06 00 | 08 0b 04 ba 00 74 01 5d |.V......|.....t.]|
|00000650| 00 78 05 54 00 de 06 97 | 00 23 00 2b 00 20 52 75 |.x.T....|.#.+. Ru|
|00000660| 6e 6e 69 6e 67 25 20 69 | 73 20 72 65 74 75 72 6e |nning% i|s return|
|00000670| 65 64 20 61 73 20 46 41 | 4c 53 45 20 69 66 00 01 |ed as FA|LSE if..|
|00000680| 00 2b 00 97 00 29 00 2b | 00 20 63 61 6e 63 65 6c |.+...).+|. cancel|
|00000690| 20 62 75 74 74 6f 6e 20 | 69 73 20 70 72 65 73 73 | button |is press|
|000006a0| 65 64 20 61 6e 64 20 63 | 6f 6e 66 69 72 6d 65 64 |ed and c|onfirmed|
|000006b0| 00 00 08 0b 04 88 00 65 | 01 1e 00 62 01 5d 00 ee |.......e|...b.]..|
|000006c0| 05 0b 04 88 00 65 01 1e | 00 64 05 0e 04 03 00 8d |.....e..|.d......|
|000006d0| 00 0c 04 ba 00 97 00 12 | 00 35 00 20 55 70 64 61 |........|.5. Upda|
|000006e0| 74 65 20 67 61 75 67 65 | 20 23 31 00 08 0b 04 88 |te gauge| #1.....|
|000006f0| 00 65 01 3c 00 62 01 5d | 00 32 06 0b 04 88 00 65 |.e.<.b.]|.2.....e|
|00000700| 01 3c 00 64 0d 0e 04 03 | 00 8d 00 0c 04 ba 00 97 |.<.d....|........|
|00000710| 00 12 00 35 00 20 55 70 | 64 61 74 65 20 67 61 75 |...5. Up|date gau|
|00000720| 67 65 20 23 32 00 08 0b | 04 88 00 65 01 64 00 64 |ge #2...|...e.d.d|
|00000730| 09 0e 04 03 00 8d 00 0c | 04 ba 00 97 00 12 00 35 |........|.......5|
|00000740| 00 20 55 70 64 61 74 65 | 20 67 61 75 67 65 20 23 |. Update| gauge #|
|00000750| 33 00 08 0b 0c 08 01 64 | 05 65 01 b8 0b 56 00 ff |3......d|.e...V..|
|00000760| ff 86 06 06 00 65 00 ff | ff 03 00 97 00 0e 00 2b |.....e..|.......+|
|00000770| 00 20 53 68 6f 72 74 20 | 44 65 6c 61 79 00 08 ad |. Short |Delay...|
|00000780| 01 0c 04 b5 00 97 00 2b | 00 2b 00 20 4e 65 65 64 |.......+|.+. Need|
|00000790| 20 61 20 44 4f 45 56 45 | 4e 54 53 28 29 20 74 6f | a DOEVE|NTS() to|
|000007a0| 20 63 61 74 63 68 20 63 | 61 6e 63 65 6c 20 62 75 | catch c|ancel bu|
|000007b0| 74 74 6f 6e 20 00 00 65 | 00 ff ff 01 00 00 00 64 |tton ..e|.......d|
|000007c0| 01 64 01 64 01 0e 1c 00 | 00 7f 00 64 01 37 00 05 |.d.d....|...d.7..|
|000007d0| 00 56 00 97 00 0e 00 2b | 00 20 52 65 6d 6f 76 65 |.V.....+|. Remove|
|000007e0| 20 46 6f 72 6d 00 00 97 | 00 05 00 00 00 0d 4c 2d | Form...|......L-|
|000007f0| 00 09 00 08 00 ff ff ff | ff ff ff ff ff 34 00 00 |........|.....4..|
|00000800| 00 00 00 03 01          |                         |.....   |        |
+--------+-------------------------+-------------------------+--------+--------+